Namespace OpenArchive
    Namespace Document
        Namespace Components.Data
            Public Class FileComponentData
                Inherits ComponentData
                Private m_Mimetype As String
                Private m_Filename As String
                Private m_Created As DateTime
                Private m_Modified As DateTime
                Friend Sub New()
                    MyBase.Version = New Version(1, 0, 0, 0)
                End Sub
                Friend Property MimeType() As String
                    Get
                        Return m_Mimetype
                    End Get
                    Set(ByVal value As String)
                        m_Mimetype = value
                    End Set
                End Property
                Friend Property Filename() As String
                    Get
                        Return m_Filename
                    End Get
                    Set(ByVal value As String)
                        m_Filename = value
                    End Set
                End Property
                Friend Property Created() As DateTime
                    Get
                        Return m_Created
                    End Get
                    Set(ByVal value As DateTime)
                        m_Created = value
                    End Set
                End Property
                Friend Property Modified() As DateTime
                    Get
                        Return m_Modified
                    End Get
                    Set(ByVal value As DateTime)
                        m_Modified = value
                    End Set
                End Property
            End Class
        End Namespace
    End Namespace
End Namespace